home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / SYMBOL / Symbol Generators / Grammars / undef < prev   
Text File  |  1998-10-23  |  323b  |  19 lines
  1. undef symbol &rest symbols
  2.  
  3. Undefines symbols and their definitions made with defsym. Use it to erase symbol definitions.
  4.  
  5. (initdef)
  6. (defsym a '(a b))
  7. (defsym b '(b a))
  8. (defsym c '(a b))
  9.  
  10. (gen-trans c 3)
  11. --> (c b c d e d e d c d e d c d e)
  12.  
  13. (undef b)
  14. (gen-trans c 3)
  15. --> (c b c d e d c)
  16.  
  17. (undef a b)
  18. (gen-trans a 3)
  19. --> (a)